home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ahoy 1988 February
/
Ahoy_Magazine_88-02_1988_Double_L.d64
/
City Maker
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
268b
|
10 lines
1 poke53281,.:poke53280,.:printchr$(147):forg=9to23step4:forx=.to7
2 a=(rnd(1)*2)+11
3 poke783,.:poke782,x*5
4 d=(rnd(1)*8)+1
5 poke781,g:sys65520:poke646,a:print"[172][172][172][172][155][146][169]":poke646,a
6 forc=1tod:poke781,g-c:sys65520
7 print"[172][172][172][172][155] ":poke646,a:next
8 poke781,g-c:poke782,x*5:poke783,.:sys65520:print"[155][169][164][164][164][206]"
9 next:next:print"":wait198,1